home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / progs / editor / frexxed / fpl / deletespaceeol.fpl < prev    next >
Text File  |  1995-07-18  |  524b  |  19 lines
  1. int export DeleteSpaceEOL()
  2. {
  3.   int line = ReadInfo("line");
  4.   int byte = ReadInfo("byte_position");
  5.   int visible = Visible(0);
  6.  
  7.   GotoLine(1);
  8.   Status(0, "Removing trailing white spaces...");
  9.   Replace(1, "( |\t)+\n", "\n", "wf+");
  10.   Status(0, "Removing trailing white spaces... done!");
  11.   GotoLine(line, byte);
  12.   Visible(visible);
  13. }
  14.  
  15. ConstructInfo("cut_trails", "", "", "WGB", "", 0, 1, 1);
  16. Hook("Save", "DeleteSpaceEOL();", "cut_trails");
  17. MenuAdd("subse", "delete space-eols", "cut_trails", "", 6, 6, -1);
  18. MenuBuild();
  19.